SAFE Logo
CodeMatch Detailed Report
Version: 5.7.2 | Date: 08/27/16 | Time: 18:43:56

SCORE

SETTINGS
Compare file 1: Z:\Zeidman Consulting\projects\DOS and CPM\code\CHM\CPM\1.3\BOOT.asm
To file 2: Z:\Zeidman Consulting\projects\DOS and CPM\code\CHM\CPM\1.3\BOOT.asm
Links to results: Matching Statements
Matching Comments and Strings
Matching Instruction Sequences
Matching Identifiers
Partially Matching Identifiers
Score
RESULTS
Matching Statements
File1 Line# File2 Line# Statement
33ORG 3000H
44BOOTB EQU 80H
55BOOTL EQU 80H
66MBIAS EQU 900H-$
7
61
7
61
BASE EQU 078H
8
62
8
62
RTYPE EQU BASE+1
9
63
9
63
RBYTE EQU BASE+3
1111BSW EQU BFFH
14
94
14
94
IN RTYPE
15
105
15
105
IN RBYTE
1818COLDSTART:
1919IN BSW
2020ANI 2H
2121JNZ COLDSTART
2323LXI H, BOOTV
2424MVI B, BOOTL
2525LXI D, BOOTB
2626MOVE:
2727MOV A, M
2828STAX D
2929INX H
3030INX D
3131DCR B
3232JNZ MOVE
3333JMP BOOTB
3535BOOTV:
3636LBIAS EQU $-80H+MBIAS
4040BIAS EQU 800H
4141FALSE EQU 0
4242TRUE EQU NOT FALSE
4343TESTING EQU FALSE
4545BDOSB EQU BIAS
4646BDOS EQU 906H+BIAS
4747BDOSE EQU 1700H+BIAS
4848BOOT EQU 1500H+BIAS
4949RBOOT EQU BOOT+3
5151ORG 80H
5353BDOSL EQU BDOSE-BDOSB
5454NTRKS EQU 2
5555BDOSS EQU BD0SL/I28
5656BDOS0 EQU 25
5757BDOS1 EQU BDOSS-BDOS0
5959MON80 EQU BF800H
6060RMON80 EQU 0FF0FH
6464RESET EQU BASE+7
6666DSTAT EQU BASE
6767LOW EQU BASE+1
6868HIGH EQU BASE+2
6969RECAL EQU 3H
7070READF EQU 4H
7171STACK EQU 100H
7373RSTART:
7474LXI SP, STACK
7676OUT RESET
7979MVI B, NTRKS
8080LXI H, IOPB0
8282START:
8585MOV A, L
8686OUT LOW
8787MOV A, H
8888OUT HIGH
8989WAIT0: IN DSTAT
9090ANI 4
9191JZ WAIT0
9595ANI 11B
9696CPI 2
98
112
98
112
IF TESTING
9999CNC RMON80
101
115
101
115
IF NOT TESTING
102102JNC RSTART
108108CC RMON80
110110ANI 11110B
113113CNZ RMON80
116116JNZ RSTART
120120LXI D, IOPBL
121121DAD D
122122DCR 8
123123JNZ START
127127JMP BOOT
130130IOPB0: DB 80H
131
139
131
139
DB READF
132132DB BDOS0
133133DB 0
134134DB 2
135135DW BDOSB
136136IOPBL EQU $-IOPB0
138138IOPB1: DB 80H
140140DB BDOS1
141
142
141
142
DB 1
143143DW BDOSB+BDOS0=l28

to top

Matching Comments and Strings
File1 Line# File2 Line# Comment/String
11MDS LOADER MOVE PROGRAM, PLACES COLD START BOOT AT BOOTB
33WE ARE LOADED HERE ON COLD START
44START OF COLD BOOT PROGRAM
5
24
5
24
LENGTH OF BOOT
66BIAS TO ADD DURING LOAD
77'BASE' USED BY DISK CONTROLLER
8
9
62
8
9
62
RESULT TYPE
1111BOOT SWITCH
1313CLEAR DISK STATUS
2020SWITCH ON?
2323VIRTUAL BASE
2525DESTINATION OF BOOT
2828TRANSFERRED ONE BYTE
3333TO BOOT SYSTEM
3535BOOT LOADER PLACE HERE AT SYSTEM GENERATION
3636COLD START BOOT BEGINS AT 80H
3939MBS COLD START LOADER FOR CP/M
4040BIAS FOR RELOCATION
4343IF TRUE, THEN GO TO MON80 ON ERRORS
4545BASE OF DOS LOAD
4646ENTRY TO DOS FOR CALLS
4747END OF DOS LOAD
4848COLD START ENTRY POINT
4949WARM START ENTRY POINT
5151LOADED DOWN FROM HARDWARE BOOT AT 3000H
54
79
54
79
NUMBER OF TRACKS TO READ
5555NUMBER OF SECTORS IN DOS
5656NUMBER OF BDOS SECTORS ON TRACK 0
5757NUMBER OF SECTORS ON TRACK 1
5959INTEL MONITOR BASE
6060RESTART LOCATION FOR MON80
6161'BASE' USED BY CONTROLLER
6363RESULT BYTE
6464RESET CONTROLLER
6666DISK STATUS PORT
6767LOW IOPB ADDRESS
6868HIGH IOPB ADDRESS
6969PFCALIBRATE SELECTED DRIVE
7070DISK READ FUNCTION
7171USE END OF BOOT FOR STACK
7474IN CASE OF CALL TO MON80
7575CLEAR THE CONTROLLER
7676L0GIC CLEARED
8484READ FIRST/NEXT TPACK INTO BDOSB
9393CHECK DISK STATUS
9999GO TO MONITOR IF 11 OR 10
102
116
102
116
RETRY THE LOAD
105105I/O COMPLETE, CHECK STATUS
106106IF NOT READY, THEN GO TO MON80
108108NOT READY BIT SET
109109RESTORE
110110OVERRUN/ADDR ERR/SEEK/CRC/XXXX
113113GO TO MONITOR
120120LENGTH OF IOPB
121121ADDRESSING NEXT IOPB
122122COUNT DOWN TRACKS
126126JMP TO BOOT TO PRINT INITIAL MESSAGE, AND SET UP JMPS
129129PARAMETER BLOCKS
130130IOCW, NO UPDATE
131131READ FUNCTION
1321320 SECTORS TO READ 0N TRACK 0
133133TRACK 0
134134START WITH SECTOR 2 ON TRACK 0
135135START AT BASE OF BDOS
140140SECTORS TO READ ON TRACK 1
141141TRACK 1
142142SECTOR 1
143143BASE OF SECOND READ

to top

Matching Instruction Sequences
File1 Line# File2 Line# Number of matching instructions
3 3 107

to top

Matching Identifiers
078H 0FF0FH 100H 11110B 11B 1500H 1700H 25
2H 3000H 3H 4H 800H 80H 900H 906H
BASE BD0SL BDOS BDOS0 BDOS1 BDOSB BDOSE BDOSL
BDOSS BF800H BFFH BIAS BOOT BOOTB BOOTL BOOTV
BSW COLDSTART DSTAT FALSE HIGH I28 IOPB0 IOPB1
IOPBL l28 LBIAS LOW MBIAS MON80 MOVE NTRKS
RBOOT RBYTE READF RECAL RESET RMON80 RSTART RTYPE
STACK START TESTING TRUE WAIT0

to top

Partially Matching Identifiers
*** NONE ***
to the top
SCORE 100

CodeSuite copyright 2003-2016 by Software Analysis and Forensic Engineering Corporation